[next] [prev] [prev-tail] [tail] [up]

3.77 \(\int \frac {(a+b \tan (e+f x))^3 (A+B \tan (e+f x)+C \tan ^2(e+f x))}{(c+d \tan (e+f x))^2} \, dx\)

Optimal. Leaf size=579 \[ \frac {\log (\cos (e+f x)) \left (a^3 \left (2 c d (A-C)-B \left (c^2-d^2\right )\right )+3 a^2 b \left (-A \left (c^2-d^2\right )-2 B c d+c^2 C-C d^2\right )-3 a b^2 \left (2 c d (A-C)-B \left (c^2-d^2\right )\right )-b^3 \left (-A \left (c^2-d^2\right )-2 B c d+c^2 C-C d^2\right )\right )}{f \left (c^2+d^2\right )^2}-\frac {x \left (a^3 \left (-A \left (c^2-d^2\right )-2 B c d+c^2 C-C d^2\right )-3 a^2 b \left (2 c d (A-C)-B \left (c^2-d^2\right )\right )-3 a b^2 \left (-A \left (c^2-d^2\right )-2 B c d+c^2 C-C d^2\right )+b^3 \left (2 c d (A-C)-B \left (c^2-d^2\right )\right )\right )}{\left (c^2+d^2\right )^2}+\frac {b^2 \tan (e+f x) \left (a d \left (d^2 (A+2 C)-B c d+3 c^2 C\right )-b \left (c d^2 (A+2 C)-2 B c^2 d-B d^3+3 c^3 C\right )\right )}{d^3 f \left (c^2+d^2\right )}-\frac {\left (A d^2-B c d+c^2 C\right ) (a+b \tan (e+f x))^3}{d f \left (c^2+d^2\right ) (c+d \tan (e+f x))}+\frac {b \left (d^2 (2 A+C)-2 B c d+3 c^2 C\right ) (a+b \tan (e+f x))^2}{2 d^2 f \left (c^2+d^2\right )}+\frac {(b c-a d)^2 \left (a d^2 \left (2 c d (A-C)-B \left (c^2-d^2\right )\right )+b \left (c^2 d^2 (A+5 C)+3 A d^4-2 B c^3 d-4 B c d^3+3 c^4 C\right )\right ) \log (c+d \tan (e+f x))}{d^4 f \left (c^2+d^2\right )^2} \]

[Out]

-(a^3*(c^2*C-2*B*c*d-C*d^2-A*(c^2-d^2))-3*a*b^2*(c^2*C-2*B*c*d-C*d^2-A*(c^2-d^2))-3*a^2*b*(2*c*(A-C)*d-B*(c^2-
d^2))+b^3*(2*c*(A-C)*d-B*(c^2-d^2)))*x/(c^2+d^2)^2+(3*a^2*b*(c^2*C-2*B*c*d-C*d^2-A*(c^2-d^2))-b^3*(c^2*C-2*B*c
*d-C*d^2-A*(c^2-d^2))+a^3*(2*c*(A-C)*d-B*(c^2-d^2))-3*a*b^2*(2*c*(A-C)*d-B*(c^2-d^2)))*ln(cos(f*x+e))/(c^2+d^2
)^2/f+(-a*d+b*c)^2*(b*(3*c^4*C-2*B*c^3*d+c^2*(A+5*C)*d^2-4*B*c*d^3+3*A*d^4)+a*d^2*(2*c*(A-C)*d-B*(c^2-d^2)))*l
n(c+d*tan(f*x+e))/d^4/(c^2+d^2)^2/f+b^2*(a*d*(3*c^2*C-B*c*d+(A+2*C)*d^2)-b*(3*c^3*C-2*B*c^2*d+c*(A+2*C)*d^2-B*
d^3))*tan(f*x+e)/d^3/(c^2+d^2)/f+1/2*b*(3*c^2*C-2*B*c*d+(2*A+C)*d^2)*(a+b*tan(f*x+e))^2/d^2/(c^2+d^2)/f-(A*d^2
-B*c*d+C*c^2)*(a+b*tan(f*x+e))^3/d/(c^2+d^2)/f/(c+d*tan(f*x+e))

________________________________________________________________________________________

Rubi [A]  time = 2.13, antiderivative size = 579, normalized size of antiderivative = 1.00, number of steps used = 7, number of rules used = 7, integrand size = 45, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.156, Rules used = {3645, 3647, 3637, 3626, 3617, 31, 3475} \[ \frac {\log (\cos (e+f x)) \left (3 a^2 b \left (-A \left (c^2-d^2\right )-2 B c d+c^2 C-C d^2\right )+a^3 \left (2 c d (A-C)-B \left (c^2-d^2\right )\right )-3 a b^2 \left (2 c d (A-C)-B \left (c^2-d^2\right )\right )-b^3 \left (-A \left (c^2-d^2\right )-2 B c d+c^2 C-C d^2\right )\right )}{f \left (c^2+d^2\right )^2}-\frac {x \left (-3 a^2 b \left (2 c d (A-C)-B \left (c^2-d^2\right )\right )+a^3 \left (-A \left (c^2-d^2\right )-2 B c d+c^2 C-C d^2\right )-3 a b^2 \left (-A \left (c^2-d^2\right )-2 B c d+c^2 C-C d^2\right )+b^3 \left (2 c d (A-C)-B \left (c^2-d^2\right )\right )\right )}{\left (c^2+d^2\right )^2}+\frac {b^2 \tan (e+f x) \left (a d \left (d^2 (A+2 C)-B c d+3 c^2 C\right )-b \left (c d^2 (A+2 C)-2 B c^2 d-B d^3+3 c^3 C\right )\right )}{d^3 f \left (c^2+d^2\right )}-\frac {\left (A d^2-B c d+c^2 C\right ) (a+b \tan (e+f x))^3}{d f \left (c^2+d^2\right ) (c+d \tan (e+f x))}+\frac {b \left (d^2 (2 A+C)-2 B c d+3 c^2 C\right ) (a+b \tan (e+f x))^2}{2 d^2 f \left (c^2+d^2\right )}+\frac {(b c-a d)^2 \left (a d^2 \left (2 c d (A-C)-B \left (c^2-d^2\right )\right )+b \left (c^2 d^2 (A+5 C)+3 A d^4-2 B c^3 d-4 B c d^3+3 c^4 C\right )\right ) \log (c+d \tan (e+f x))}{d^4 f \left (c^2+d^2\right )^2} \]

Antiderivative was successfully verified.

[In]

Int[((a + b*Tan[e + f*x])^3*(A + B*Tan[e + f*x] + C*Tan[e + f*x]^2))/(c + d*Tan[e + f*x])^2,x]

[Out]

-(((a^3*(c^2*C - 2*B*c*d - C*d^2 - A*(c^2 - d^2)) - 3*a*b^2*(c^2*C - 2*B*c*d - C*d^2 - A*(c^2 - d^2)) - 3*a^2*
b*(2*c*(A - C)*d - B*(c^2 - d^2)) + b^3*(2*c*(A - C)*d - B*(c^2 - d^2)))*x)/(c^2 + d^2)^2) + ((3*a^2*b*(c^2*C
- 2*B*c*d - C*d^2 - A*(c^2 - d^2)) - b^3*(c^2*C - 2*B*c*d - C*d^2 - A*(c^2 - d^2)) + a^3*(2*c*(A - C)*d - B*(c
^2 - d^2)) - 3*a*b^2*(2*c*(A - C)*d - B*(c^2 - d^2)))*Log[Cos[e + f*x]])/((c^2 + d^2)^2*f) + ((b*c - a*d)^2*(b
*(3*c^4*C - 2*B*c^3*d + c^2*(A + 5*C)*d^2 - 4*B*c*d^3 + 3*A*d^4) + a*d^2*(2*c*(A - C)*d - B*(c^2 - d^2)))*Log[
c + d*Tan[e + f*x]])/(d^4*(c^2 + d^2)^2*f) + (b^2*(a*d*(3*c^2*C - B*c*d + (A + 2*C)*d^2) - b*(3*c^3*C - 2*B*c^
2*d + c*(A + 2*C)*d^2 - B*d^3))*Tan[e + f*x])/(d^3*(c^2 + d^2)*f) + (b*(3*c^2*C - 2*B*c*d + (2*A + C)*d^2)*(a
+ b*Tan[e + f*x])^2)/(2*d^2*(c^2 + d^2)*f) - ((c^2*C - B*c*d + A*d^2)*(a + b*Tan[e + f*x])^3)/(d*(c^2 + d^2)*f
*(c + d*Tan[e + f*x]))

Rule 31

Int[((a_) + (b_.)*(x_))^(-1), x_Symbol] :> Simp[Log[RemoveContent[a + b*x, x]]/b, x] /; FreeQ[{a, b}, x]

Rule 3475

Int[tan[(c_.) + (d_.)*(x_)], x_Symbol] :> -Simp[Log[RemoveContent[Cos[c + d*x], x]]/d, x] /; FreeQ[{c, d}, x]

Rule 3617

Int[((a_.) + (b_.)*tan[(e_.) + (f_.)*(x_)])^(m_.)*((A_) + (C_.)*tan[(e_.) + (f_.)*(x_)]^2), x_Symbol] :> Dist[
A/(b*f), Subst[Int[(a + x)^m, x], x, b*Tan[e + f*x]], x] /; FreeQ[{a, b, e, f, A, C, m}, x] && EqQ[A, C]

Rule 3626

Int[((A_) + (B_.)*tan[(e_.) + (f_.)*(x_)] + (C_.)*tan[(e_.) + (f_.)*(x_)]^2)/((a_.) + (b_.)*tan[(e_.) + (f_.)*
(x_)]), x_Symbol] :> Simp[((a*A + b*B - a*C)*x)/(a^2 + b^2), x] + (Dist[(A*b^2 - a*b*B + a^2*C)/(a^2 + b^2), I
nt[(1 + Tan[e + f*x]^2)/(a + b*Tan[e + f*x]), x], x] - Dist[(A*b - a*B - b*C)/(a^2 + b^2), Int[Tan[e + f*x], x
], x]) /; FreeQ[{a, b, e, f, A, B, C}, x] && NeQ[A*b^2 - a*b*B + a^2*C, 0] && NeQ[a^2 + b^2, 0] && NeQ[A*b - a
*B - b*C, 0]

Rule 3637

Int[((a_) + (b_.)*tan[(e_.) + (f_.)*(x_)])*((c_.) + (d_.)*tan[(e_.) + (f_.)*(x_)])^(n_.)*((A_.) + (B_.)*tan[(e
_.) + (f_.)*(x_)] + (C_.)*tan[(e_.) + (f_.)*(x_)]^2), x_Symbol] :> Simp[(b*C*Tan[e + f*x]*(c + d*Tan[e + f*x])
^(n + 1))/(d*f*(n + 2)), x] - Dist[1/(d*(n + 2)), Int[(c + d*Tan[e + f*x])^n*Simp[b*c*C - a*A*d*(n + 2) - (A*b
 + a*B - b*C)*d*(n + 2)*Tan[e + f*x] - (a*C*d*(n + 2) - b*(c*C - B*d*(n + 2)))*Tan[e + f*x]^2, x], x], x] /; F
reeQ[{a, b, c, d, e, f, A, B, C, n}, x] && NeQ[b*c - a*d, 0] && NeQ[c^2 + d^2, 0] &&  !LtQ[n, -1]

Rule 3645

Int[((a_.) + (b_.)*tan[(e_.) + (f_.)*(x_)])^(m_)*((c_.) + (d_.)*tan[(e_.) + (f_.)*(x_)])^(n_)*((A_.) + (B_.)*t
an[(e_.) + (f_.)*(x_)] + (C_.)*tan[(e_.) + (f_.)*(x_)]^2), x_Symbol] :> Simp[((A*d^2 + c*(c*C - B*d))*(a + b*T
an[e + f*x])^m*(c + d*Tan[e + f*x])^(n + 1))/(d*f*(n + 1)*(c^2 + d^2)), x] - Dist[1/(d*(n + 1)*(c^2 + d^2)), I
nt[(a + b*Tan[e + f*x])^(m - 1)*(c + d*Tan[e + f*x])^(n + 1)*Simp[A*d*(b*d*m - a*c*(n + 1)) + (c*C - B*d)*(b*c
*m + a*d*(n + 1)) - d*(n + 1)*((A - C)*(b*c - a*d) + B*(a*c + b*d))*Tan[e + f*x] - b*(d*(B*c - A*d)*(m + n + 1
) - C*(c^2*m - d^2*(n + 1)))*Tan[e + f*x]^2, x], x], x] /; FreeQ[{a, b, c, d, e, f, A, B, C}, x] && NeQ[b*c -
a*d, 0] && NeQ[a^2 + b^2, 0] && NeQ[c^2 + d^2, 0] && GtQ[m, 0] && LtQ[n, -1]

Rule 3647

Int[((a_.) + (b_.)*tan[(e_.) + (f_.)*(x_)])^(m_.)*((c_.) + (d_.)*tan[(e_.) + (f_.)*(x_)])^(n_)*((A_.) + (B_.)*
tan[(e_.) + (f_.)*(x_)] + (C_.)*tan[(e_.) + (f_.)*(x_)]^2), x_Symbol] :> Simp[(C*(a + b*Tan[e + f*x])^m*(c + d
*Tan[e + f*x])^(n + 1))/(d*f*(m + n + 1)), x] + Dist[1/(d*(m + n + 1)), Int[(a + b*Tan[e + f*x])^(m - 1)*(c +
d*Tan[e + f*x])^n*Simp[a*A*d*(m + n + 1) - C*(b*c*m + a*d*(n + 1)) + d*(A*b + a*B - b*C)*(m + n + 1)*Tan[e + f
*x] - (C*m*(b*c - a*d) - b*B*d*(m + n + 1))*Tan[e + f*x]^2, x], x], x] /; FreeQ[{a, b, c, d, e, f, A, B, C, n}
, x] && NeQ[b*c - a*d, 0] && NeQ[a^2 + b^2, 0] && NeQ[c^2 + d^2, 0] && GtQ[m, 0] &&  !(IGtQ[n, 0] && ( !Intege
rQ[m] || (EqQ[c, 0] && NeQ[a, 0])))

Rubi steps

\begin {align*} \int \frac {(a+b \tan (e+f x))^3 \left (A+B \tan (e+f x)+C \tan ^2(e+f x)\right )}{(c+d \tan (e+f x))^2} \, dx &=-\frac {\left (c^2 C-B c d+A d^2\right ) (a+b \tan (e+f x))^3}{d \left (c^2+d^2\right ) f (c+d \tan (e+f x))}+\frac {\int \frac {(a+b \tan (e+f x))^2 \left (A d (a c+3 b d)+(3 b c-a d) (c C-B d)+d ((A-C) (b c-a d)+B (a c+b d)) \tan (e+f x)+b \left (3 c^2 C-2 B c d+(2 A+C) d^2\right ) \tan ^2(e+f x)\right )}{c+d \tan (e+f x)} \, dx}{d \left (c^2+d^2\right )}\\ &=\frac {b \left (3 c^2 C-2 B c d+(2 A+C) d^2\right ) (a+b \tan (e+f x))^2}{2 d^2 \left (c^2+d^2\right ) f}-\frac {\left (c^2 C-B c d+A d^2\right ) (a+b \tan (e+f x))^3}{d \left (c^2+d^2\right ) f (c+d \tan (e+f x))}+\frac {\int \frac {(a+b \tan (e+f x)) \left (-2 \left (b^2 c \left (3 c^2 C-2 B c d+(2 A+C) d^2\right )-a d (A d (a c+3 b d)+(3 b c-a d) (c C-B d))\right )+2 d^2 \left (2 a b (A c-c C+B d)+a^2 (B c-(A-C) d)-b^2 (B c-(A-C) d)\right ) \tan (e+f x)+2 b \left (a d \left (3 c^2 C-B c d+(A+2 C) d^2\right )-b \left (3 c^3 C-2 B c^2 d+c (A+2 C) d^2-B d^3\right )\right ) \tan ^2(e+f x)\right )}{c+d \tan (e+f x)} \, dx}{2 d^2 \left (c^2+d^2\right )}\\ &=\frac {b^2 \left (a d \left (3 c^2 C-B c d+(A+2 C) d^2\right )-b \left (3 c^3 C-2 B c^2 d+c (A+2 C) d^2-B d^3\right )\right ) \tan (e+f x)}{d^3 \left (c^2+d^2\right ) f}+\frac {b \left (3 c^2 C-2 B c d+(2 A+C) d^2\right ) (a+b \tan (e+f x))^2}{2 d^2 \left (c^2+d^2\right ) f}-\frac {\left (c^2 C-B c d+A d^2\right ) (a+b \tan (e+f x))^3}{d \left (c^2+d^2\right ) f (c+d \tan (e+f x))}-\frac {\int \frac {-2 \left (a^3 d^3 (A c-c C+B d)+3 a^2 b d^2 \left (c^2 C-B c d+A d^2\right )-3 a b^2 c d \left (2 c^2 C-B c d+(A+C) d^2\right )+b^3 c \left (3 c^3 C-2 B c^2 d+c (A+2 C) d^2-B d^3\right )\right )-2 d^3 \left (3 a^2 b (A c-c C+B d)-b^3 (A c-c C+B d)+a^3 (B c-(A-C) d)-3 a b^2 (B c-(A-C) d)\right ) \tan (e+f x)-2 b \left (c^2+d^2\right ) \left (3 a^2 C d^2-3 a b d (2 c C-B d)+b^2 \left (3 c^2 C-2 B c d+(A-C) d^2\right )\right ) \tan ^2(e+f x)}{c+d \tan (e+f x)} \, dx}{2 d^3 \left (c^2+d^2\right )}\\ &=-\frac {\left (a^3 \left (c^2 C-2 B c d-C d^2-A \left (c^2-d^2\right )\right )-3 a b^2 \left (c^2 C-2 B c d-C d^2-A \left (c^2-d^2\right )\right )-3 a^2 b \left (2 c (A-C) d-B \left (c^2-d^2\right )\right )+b^3 \left (2 c (A-C) d-B \left (c^2-d^2\right )\right )\right ) x}{\left (c^2+d^2\right )^2}+\frac {b^2 \left (a d \left (3 c^2 C-B c d+(A+2 C) d^2\right )-b \left (3 c^3 C-2 B c^2 d+c (A+2 C) d^2-B d^3\right )\right ) \tan (e+f x)}{d^3 \left (c^2+d^2\right ) f}+\frac {b \left (3 c^2 C-2 B c d+(2 A+C) d^2\right ) (a+b \tan (e+f x))^2}{2 d^2 \left (c^2+d^2\right ) f}-\frac {\left (c^2 C-B c d+A d^2\right ) (a+b \tan (e+f x))^3}{d \left (c^2+d^2\right ) f (c+d \tan (e+f x))}-\frac {\left (3 a^2 b \left (c^2 C-2 B c d-C d^2-A \left (c^2-d^2\right )\right )-b^3 \left (c^2 C-2 B c d-C d^2-A \left (c^2-d^2\right )\right )+a^3 \left (2 c (A-C) d-B \left (c^2-d^2\right )\right )-3 a b^2 \left (2 c (A-C) d-B \left (c^2-d^2\right )\right )\right ) \int \tan (e+f x) \, dx}{\left (c^2+d^2\right )^2}+\frac {\left ((b c-a d)^2 \left (b \left (3 c^4 C-2 B c^3 d+c^2 (A+5 C) d^2-4 B c d^3+3 A d^4\right )+a d^2 \left (2 c (A-C) d-B \left (c^2-d^2\right )\right )\right )\right ) \int \frac {1+\tan ^2(e+f x)}{c+d \tan (e+f x)} \, dx}{d^3 \left (c^2+d^2\right )^2}\\ &=-\frac {\left (a^3 \left (c^2 C-2 B c d-C d^2-A \left (c^2-d^2\right )\right )-3 a b^2 \left (c^2 C-2 B c d-C d^2-A \left (c^2-d^2\right )\right )-3 a^2 b \left (2 c (A-C) d-B \left (c^2-d^2\right )\right )+b^3 \left (2 c (A-C) d-B \left (c^2-d^2\right )\right )\right ) x}{\left (c^2+d^2\right )^2}+\frac {\left (3 a^2 b \left (c^2 C-2 B c d-C d^2-A \left (c^2-d^2\right )\right )-b^3 \left (c^2 C-2 B c d-C d^2-A \left (c^2-d^2\right )\right )+a^3 \left (2 c (A-C) d-B \left (c^2-d^2\right )\right )-3 a b^2 \left (2 c (A-C) d-B \left (c^2-d^2\right )\right )\right ) \log (\cos (e+f x))}{\left (c^2+d^2\right )^2 f}+\frac {b^2 \left (a d \left (3 c^2 C-B c d+(A+2 C) d^2\right )-b \left (3 c^3 C-2 B c^2 d+c (A+2 C) d^2-B d^3\right )\right ) \tan (e+f x)}{d^3 \left (c^2+d^2\right ) f}+\frac {b \left (3 c^2 C-2 B c d+(2 A+C) d^2\right ) (a+b \tan (e+f x))^2}{2 d^2 \left (c^2+d^2\right ) f}-\frac {\left (c^2 C-B c d+A d^2\right ) (a+b \tan (e+f x))^3}{d \left (c^2+d^2\right ) f (c+d \tan (e+f x))}+\frac {\left ((b c-a d)^2 \left (b \left (3 c^4 C-2 B c^3 d+c^2 (A+5 C) d^2-4 B c d^3+3 A d^4\right )+a d^2 \left (2 c (A-C) d-B \left (c^2-d^2\right )\right )\right )\right ) \operatorname {Subst}\left (\int \frac {1}{c+x} \, dx,x,d \tan (e+f x)\right )}{d^4 \left (c^2+d^2\right )^2 f}\\ &=-\frac {\left (a^3 \left (c^2 C-2 B c d-C d^2-A \left (c^2-d^2\right )\right )-3 a b^2 \left (c^2 C-2 B c d-C d^2-A \left (c^2-d^2\right )\right )-3 a^2 b \left (2 c (A-C) d-B \left (c^2-d^2\right )\right )+b^3 \left (2 c (A-C) d-B \left (c^2-d^2\right )\right )\right ) x}{\left (c^2+d^2\right )^2}+\frac {\left (3 a^2 b \left (c^2 C-2 B c d-C d^2-A \left (c^2-d^2\right )\right )-b^3 \left (c^2 C-2 B c d-C d^2-A \left (c^2-d^2\right )\right )+a^3 \left (2 c (A-C) d-B \left (c^2-d^2\right )\right )-3 a b^2 \left (2 c (A-C) d-B \left (c^2-d^2\right )\right )\right ) \log (\cos (e+f x))}{\left (c^2+d^2\right )^2 f}+\frac {(b c-a d)^2 \left (b \left (3 c^4 C-2 B c^3 d+c^2 (A+5 C) d^2-4 B c d^3+3 A d^4\right )+a d^2 \left (2 c (A-C) d-B \left (c^2-d^2\right )\right )\right ) \log (c+d \tan (e+f x))}{d^4 \left (c^2+d^2\right )^2 f}+\frac {b^2 \left (a d \left (3 c^2 C-B c d+(A+2 C) d^2\right )-b \left (3 c^3 C-2 B c^2 d+c (A+2 C) d^2-B d^3\right )\right ) \tan (e+f x)}{d^3 \left (c^2+d^2\right ) f}+\frac {b \left (3 c^2 C-2 B c d+(2 A+C) d^2\right ) (a+b \tan (e+f x))^2}{2 d^2 \left (c^2+d^2\right ) f}-\frac {\left (c^2 C-B c d+A d^2\right ) (a+b \tan (e+f x))^3}{d \left (c^2+d^2\right ) f (c+d \tan (e+f x))}\\ \end {align*}

________________________________________________________________________________________

Mathematica [C]  time = 8.55, size = 2463, normalized size = 4.25 \[ \text {Result too large to show} \]

Antiderivative was successfully verified.

[In]

Integrate[((a + b*Tan[e + f*x])^3*(A + B*Tan[e + f*x] + C*Tan[e + f*x]^2))/(c + d*Tan[e + f*x])^2,x]

[Out]

((a^3*A*c^2 - 3*a*A*b^2*c^2 - 3*a^2*b*B*c^2 + b^3*B*c^2 - a^3*c^2*C + 3*a*b^2*c^2*C + 6*a^2*A*b*c*d - 2*A*b^3*
c*d + 2*a^3*B*c*d - 6*a*b^2*B*c*d - 6*a^2*b*c*C*d + 2*b^3*c*C*d - a^3*A*d^2 + 3*a*A*b^2*d^2 + 3*a^2*b*B*d^2 -
b^3*B*d^2 + a^3*C*d^2 - 3*a*b^2*C*d^2)*(e + f*x)*Cos[e + f*x]*(c*Cos[e + f*x] + d*Sin[e + f*x])^2*(a + b*Tan[e
 + f*x])^3)/((c - I*d)^2*(c + I*d)^2*f*(a*Cos[e + f*x] + b*Sin[e + f*x])^3*(c + d*Tan[e + f*x])^2) + (((3*I)*b
^3*c^11*C*d^3 - (2*I)*b^3*B*c^10*d^4 - (6*I)*a*b^2*c^10*C*d^4 + 3*b^3*c^10*C*d^4 + I*A*b^3*c^9*d^5 + (3*I)*a*b
^2*B*c^9*d^5 - 2*b^3*B*c^9*d^5 + (3*I)*a^2*b*c^9*C*d^5 - 6*a*b^2*c^9*C*d^5 + (8*I)*b^3*c^9*C*d^5 + A*b^3*c^8*d
^6 + 3*a*b^2*B*c^8*d^6 - (6*I)*b^3*B*c^8*d^6 + 3*a^2*b*c^8*C*d^6 - (18*I)*a*b^2*c^8*C*d^6 + 8*b^3*c^8*C*d^6 -
(3*I)*a^2*A*b*c^7*d^7 + (4*I)*A*b^3*c^7*d^7 - I*a^3*B*c^7*d^7 + (12*I)*a*b^2*B*c^7*d^7 - 6*b^3*B*c^7*d^7 + (12
*I)*a^2*b*c^7*C*d^7 - 18*a*b^2*c^7*C*d^7 + (5*I)*b^3*c^7*C*d^7 + (2*I)*a^3*A*c^6*d^8 - 3*a^2*A*b*c^6*d^8 - (6*
I)*a*A*b^2*c^6*d^8 + 4*A*b^3*c^6*d^8 - a^3*B*c^6*d^8 - (6*I)*a^2*b*B*c^6*d^8 + 12*a*b^2*B*c^6*d^8 - (4*I)*b^3*
B*c^6*d^8 - (2*I)*a^3*c^6*C*d^8 + 12*a^2*b*c^6*C*d^8 - (12*I)*a*b^2*c^6*C*d^8 + 5*b^3*c^6*C*d^8 + 2*a^3*A*c^5*
d^9 - 6*a*A*b^2*c^5*d^9 + (3*I)*A*b^3*c^5*d^9 - 6*a^2*b*B*c^5*d^9 + (9*I)*a*b^2*B*c^5*d^9 - 4*b^3*B*c^5*d^9 -
2*a^3*c^5*C*d^9 + (9*I)*a^2*b*c^5*C*d^9 - 12*a*b^2*c^5*C*d^9 + (2*I)*a^3*A*c^4*d^10 - (6*I)*a*A*b^2*c^4*d^10 +
 3*A*b^3*c^4*d^10 - (6*I)*a^2*b*B*c^4*d^10 + 9*a*b^2*B*c^4*d^10 - (2*I)*a^3*c^4*C*d^10 + 9*a^2*b*c^4*C*d^10 +
2*a^3*A*c^3*d^11 + (3*I)*a^2*A*b*c^3*d^11 - 6*a*A*b^2*c^3*d^11 + I*a^3*B*c^3*d^11 - 6*a^2*b*B*c^3*d^11 - 2*a^3
*c^3*C*d^11 + 3*a^2*A*b*c^2*d^12 + a^3*B*c^2*d^12)*(e + f*x)*Cos[e + f*x]*(c*Cos[e + f*x] + d*Sin[e + f*x])^2*
(a + b*Tan[e + f*x])^3)/(c^2*(c - I*d)^4*(c + I*d)^3*d^7*f*(a*Cos[e + f*x] + b*Sin[e + f*x])^3*(c + d*Tan[e +
f*x])^2) - (I*(3*b^3*c^6*C - 2*b^3*B*c^5*d - 6*a*b^2*c^5*C*d + A*b^3*c^4*d^2 + 3*a*b^2*B*c^4*d^2 + 3*a^2*b*c^4
*C*d^2 + 5*b^3*c^4*C*d^2 - 4*b^3*B*c^3*d^3 - 12*a*b^2*c^3*C*d^3 - 3*a^2*A*b*c^2*d^4 + 3*A*b^3*c^2*d^4 - a^3*B*
c^2*d^4 + 9*a*b^2*B*c^2*d^4 + 9*a^2*b*c^2*C*d^4 + 2*a^3*A*c*d^5 - 6*a*A*b^2*c*d^5 - 6*a^2*b*B*c*d^5 - 2*a^3*c*
C*d^5 + 3*a^2*A*b*d^6 + a^3*B*d^6)*ArcTan[Tan[e + f*x]]*Cos[e + f*x]*(c*Cos[e + f*x] + d*Sin[e + f*x])^2*(a +
b*Tan[e + f*x])^3)/(d^4*(c^2 + d^2)^2*f*(a*Cos[e + f*x] + b*Sin[e + f*x])^3*(c + d*Tan[e + f*x])^2) + ((-3*b^3
*c^2*C + 2*b^3*B*c*d + 6*a*b^2*c*C*d - A*b^3*d^2 - 3*a*b^2*B*d^2 - 3*a^2*b*C*d^2 + b^3*C*d^2)*Cos[e + f*x]*Log
[Cos[e + f*x]]*(c*Cos[e + f*x] + d*Sin[e + f*x])^2*(a + b*Tan[e + f*x])^3)/(d^4*f*(a*Cos[e + f*x] + b*Sin[e +
f*x])^3*(c + d*Tan[e + f*x])^2) + ((3*b^3*c^6*C - 2*b^3*B*c^5*d - 6*a*b^2*c^5*C*d + A*b^3*c^4*d^2 + 3*a*b^2*B*
c^4*d^2 + 3*a^2*b*c^4*C*d^2 + 5*b^3*c^4*C*d^2 - 4*b^3*B*c^3*d^3 - 12*a*b^2*c^3*C*d^3 - 3*a^2*A*b*c^2*d^4 + 3*A
*b^3*c^2*d^4 - a^3*B*c^2*d^4 + 9*a*b^2*B*c^2*d^4 + 9*a^2*b*c^2*C*d^4 + 2*a^3*A*c*d^5 - 6*a*A*b^2*c*d^5 - 6*a^2
*b*B*c*d^5 - 2*a^3*c*C*d^5 + 3*a^2*A*b*d^6 + a^3*B*d^6)*Cos[e + f*x]*Log[(c*Cos[e + f*x] + d*Sin[e + f*x])^2]*
(c*Cos[e + f*x] + d*Sin[e + f*x])^2*(a + b*Tan[e + f*x])^3)/(2*d^4*(c^2 + d^2)^2*f*(a*Cos[e + f*x] + b*Sin[e +
 f*x])^3*(c + d*Tan[e + f*x])^2) + (b^3*C*Sec[e + f*x]*(c*Cos[e + f*x] + d*Sin[e + f*x])^2*(a + b*Tan[e + f*x]
)^3)/(2*d^2*f*(a*Cos[e + f*x] + b*Sin[e + f*x])^3*(c + d*Tan[e + f*x])^2) + ((c*Cos[e + f*x] + d*Sin[e + f*x])
^2*(-2*b^3*c*C*Sin[e + f*x] + b^3*B*d*Sin[e + f*x] + 3*a*b^2*C*d*Sin[e + f*x])*(a + b*Tan[e + f*x])^3)/(d^3*f*
(a*Cos[e + f*x] + b*Sin[e + f*x])^3*(c + d*Tan[e + f*x])^2) + (Cos[e + f*x]*(c*Cos[e + f*x] + d*Sin[e + f*x])*
(-(b^3*c^5*C*Sin[e + f*x]) + b^3*B*c^4*d*Sin[e + f*x] + 3*a*b^2*c^4*C*d*Sin[e + f*x] - A*b^3*c^3*d^2*Sin[e + f
*x] - 3*a*b^2*B*c^3*d^2*Sin[e + f*x] - 3*a^2*b*c^3*C*d^2*Sin[e + f*x] + 3*a*A*b^2*c^2*d^3*Sin[e + f*x] + 3*a^2
*b*B*c^2*d^3*Sin[e + f*x] + a^3*c^2*C*d^3*Sin[e + f*x] - 3*a^2*A*b*c*d^4*Sin[e + f*x] - a^3*B*c*d^4*Sin[e + f*
x] + a^3*A*d^5*Sin[e + f*x])*(a + b*Tan[e + f*x])^3)/(c*(c - I*d)*(c + I*d)*d^3*f*(a*Cos[e + f*x] + b*Sin[e +
f*x])^3*(c + d*Tan[e + f*x])^2)

________________________________________________________________________________________

fricas [B]  time = 2.37, size = 1477, normalized size = 2.55 \[ \text {result too large to display} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a+b*tan(f*x+e))^3*(A+B*tan(f*x+e)+C*tan(f*x+e)^2)/(c+d*tan(f*x+e))^2,x, algorithm="fricas")

[Out]

1/2*(3*C*b^3*c^5*d^2 - 2*A*a^3*d^7 - 2*(3*C*a*b^2 + B*b^3)*c^4*d^3 + 2*(3*C*a^2*b + 3*B*a*b^2 + (A + C)*b^3)*c
^3*d^4 - 2*(C*a^3 + 3*B*a^2*b + 3*A*a*b^2)*c^2*d^5 + (2*B*a^3 + 6*A*a^2*b + C*b^3)*c*d^6 + (C*b^3*c^4*d^3 + 2*
C*b^3*c^2*d^5 + C*b^3*d^7)*tan(f*x + e)^3 + 2*(((A - C)*a^3 - 3*B*a^2*b - 3*(A - C)*a*b^2 + B*b^3)*c^3*d^4 + 2
*(B*a^3 + 3*(A - C)*a^2*b - 3*B*a*b^2 - (A - C)*b^3)*c^2*d^5 - ((A - C)*a^3 - 3*B*a^2*b - 3*(A - C)*a*b^2 + B*
b^3)*c*d^6)*f*x - (3*C*b^3*c^5*d^2 + 6*C*b^3*c^3*d^4 + 3*C*b^3*c*d^6 - 2*(3*C*a*b^2 + B*b^3)*c^4*d^3 - 4*(3*C*
a*b^2 + B*b^3)*c^2*d^5 - 2*(3*C*a*b^2 + B*b^3)*d^7)*tan(f*x + e)^2 + (3*C*b^3*c^7 - 2*(3*C*a*b^2 + B*b^3)*c^6*
d + (3*C*a^2*b + 3*B*a*b^2 + (A + 5*C)*b^3)*c^5*d^2 - 4*(3*C*a*b^2 + B*b^3)*c^4*d^3 - (B*a^3 + 3*(A - 3*C)*a^2
*b - 9*B*a*b^2 - 3*A*b^3)*c^3*d^4 + 2*((A - C)*a^3 - 3*B*a^2*b - 3*A*a*b^2)*c^2*d^5 + (B*a^3 + 3*A*a^2*b)*c*d^
6 + (3*C*b^3*c^6*d - 2*(3*C*a*b^2 + B*b^3)*c^5*d^2 + (3*C*a^2*b + 3*B*a*b^2 + (A + 5*C)*b^3)*c^4*d^3 - 4*(3*C*
a*b^2 + B*b^3)*c^3*d^4 - (B*a^3 + 3*(A - 3*C)*a^2*b - 9*B*a*b^2 - 3*A*b^3)*c^2*d^5 + 2*((A - C)*a^3 - 3*B*a^2*
b - 3*A*a*b^2)*c*d^6 + (B*a^3 + 3*A*a^2*b)*d^7)*tan(f*x + e))*log((d^2*tan(f*x + e)^2 + 2*c*d*tan(f*x + e) + c
^2)/(tan(f*x + e)^2 + 1)) - (3*C*b^3*c^7 - 2*(3*C*a*b^2 + B*b^3)*c^6*d + (3*C*a^2*b + 3*B*a*b^2 + (A + 5*C)*b^
3)*c^5*d^2 - 4*(3*C*a*b^2 + B*b^3)*c^4*d^3 + (6*C*a^2*b + 6*B*a*b^2 + (2*A + C)*b^3)*c^3*d^4 - 2*(3*C*a*b^2 +
B*b^3)*c^2*d^5 + (3*C*a^2*b + 3*B*a*b^2 + (A - C)*b^3)*c*d^6 + (3*C*b^3*c^6*d - 2*(3*C*a*b^2 + B*b^3)*c^5*d^2
+ (3*C*a^2*b + 3*B*a*b^2 + (A + 5*C)*b^3)*c^4*d^3 - 4*(3*C*a*b^2 + B*b^3)*c^3*d^4 + (6*C*a^2*b + 6*B*a*b^2 + (
2*A + C)*b^3)*c^2*d^5 - 2*(3*C*a*b^2 + B*b^3)*c*d^6 + (3*C*a^2*b + 3*B*a*b^2 + (A - C)*b^3)*d^7)*tan(f*x + e))
*log(1/(tan(f*x + e)^2 + 1)) - (6*C*b^3*c^6*d - C*b^3*d^7 - 4*(3*C*a*b^2 + B*b^3)*c^5*d^2 + (6*C*a^2*b + 6*B*a
*b^2 + (2*A + 7*C)*b^3)*c^4*d^3 - 2*(C*a^3 + 3*B*a^2*b + 3*(A + 2*C)*a*b^2 + 2*B*b^3)*c^3*d^4 + 2*(B*a^3 + 3*A
*a^2*b + C*b^3)*c^2*d^5 - 2*(A*a^3 + 3*C*a*b^2 + B*b^3)*c*d^6 - 2*(((A - C)*a^3 - 3*B*a^2*b - 3*(A - C)*a*b^2
+ B*b^3)*c^2*d^5 + 2*(B*a^3 + 3*(A - C)*a^2*b - 3*B*a*b^2 - (A - C)*b^3)*c*d^6 - ((A - C)*a^3 - 3*B*a^2*b - 3*
(A - C)*a*b^2 + B*b^3)*d^7)*f*x)*tan(f*x + e))/((c^4*d^5 + 2*c^2*d^7 + d^9)*f*tan(f*x + e) + (c^5*d^4 + 2*c^3*
d^6 + c*d^8)*f)

________________________________________________________________________________________

giac [B]  time = 3.65, size = 1355, normalized size = 2.34 \[ \text {result too large to display} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a+b*tan(f*x+e))^3*(A+B*tan(f*x+e)+C*tan(f*x+e)^2)/(c+d*tan(f*x+e))^2,x, algorithm="giac")

[Out]

1/2*(2*(A*a^3*c^2 - C*a^3*c^2 - 3*B*a^2*b*c^2 - 3*A*a*b^2*c^2 + 3*C*a*b^2*c^2 + B*b^3*c^2 + 2*B*a^3*c*d + 6*A*
a^2*b*c*d - 6*C*a^2*b*c*d - 6*B*a*b^2*c*d - 2*A*b^3*c*d + 2*C*b^3*c*d - A*a^3*d^2 + C*a^3*d^2 + 3*B*a^2*b*d^2
+ 3*A*a*b^2*d^2 - 3*C*a*b^2*d^2 - B*b^3*d^2)*(f*x + e)/(c^4 + 2*c^2*d^2 + d^4) + (B*a^3*c^2 + 3*A*a^2*b*c^2 -
3*C*a^2*b*c^2 - 3*B*a*b^2*c^2 - A*b^3*c^2 + C*b^3*c^2 - 2*A*a^3*c*d + 2*C*a^3*c*d + 6*B*a^2*b*c*d + 6*A*a*b^2*
c*d - 6*C*a*b^2*c*d - 2*B*b^3*c*d - B*a^3*d^2 - 3*A*a^2*b*d^2 + 3*C*a^2*b*d^2 + 3*B*a*b^2*d^2 + A*b^3*d^2 - C*
b^3*d^2)*log(tan(f*x + e)^2 + 1)/(c^4 + 2*c^2*d^2 + d^4) + 2*(3*C*b^3*c^6 - 6*C*a*b^2*c^5*d - 2*B*b^3*c^5*d +
3*C*a^2*b*c^4*d^2 + 3*B*a*b^2*c^4*d^2 + A*b^3*c^4*d^2 + 5*C*b^3*c^4*d^2 - 12*C*a*b^2*c^3*d^3 - 4*B*b^3*c^3*d^3
 - B*a^3*c^2*d^4 - 3*A*a^2*b*c^2*d^4 + 9*C*a^2*b*c^2*d^4 + 9*B*a*b^2*c^2*d^4 + 3*A*b^3*c^2*d^4 + 2*A*a^3*c*d^5
 - 2*C*a^3*c*d^5 - 6*B*a^2*b*c*d^5 - 6*A*a*b^2*c*d^5 + B*a^3*d^6 + 3*A*a^2*b*d^6)*log(abs(d*tan(f*x + e) + c))
/(c^4*d^4 + 2*c^2*d^6 + d^8) - 2*(3*C*b^3*c^6*d*tan(f*x + e) - 6*C*a*b^2*c^5*d^2*tan(f*x + e) - 2*B*b^3*c^5*d^
2*tan(f*x + e) + 3*C*a^2*b*c^4*d^3*tan(f*x + e) + 3*B*a*b^2*c^4*d^3*tan(f*x + e) + A*b^3*c^4*d^3*tan(f*x + e)
+ 5*C*b^3*c^4*d^3*tan(f*x + e) - 12*C*a*b^2*c^3*d^4*tan(f*x + e) - 4*B*b^3*c^3*d^4*tan(f*x + e) - B*a^3*c^2*d^
5*tan(f*x + e) - 3*A*a^2*b*c^2*d^5*tan(f*x + e) + 9*C*a^2*b*c^2*d^5*tan(f*x + e) + 9*B*a*b^2*c^2*d^5*tan(f*x +
 e) + 3*A*b^3*c^2*d^5*tan(f*x + e) + 2*A*a^3*c*d^6*tan(f*x + e) - 2*C*a^3*c*d^6*tan(f*x + e) - 6*B*a^2*b*c*d^6
*tan(f*x + e) - 6*A*a*b^2*c*d^6*tan(f*x + e) + B*a^3*d^7*tan(f*x + e) + 3*A*a^2*b*d^7*tan(f*x + e) + 2*C*b^3*c
^7 - 3*C*a*b^2*c^6*d - B*b^3*c^6*d + 4*C*b^3*c^5*d^2 + C*a^3*c^4*d^3 + 3*B*a^2*b*c^4*d^3 + 3*A*a*b^2*c^4*d^3 -
 9*C*a*b^2*c^4*d^3 - 3*B*b^3*c^4*d^3 - 2*B*a^3*c^3*d^4 - 6*A*a^2*b*c^3*d^4 + 6*C*a^2*b*c^3*d^4 + 6*B*a*b^2*c^3
*d^4 + 2*A*b^3*c^3*d^4 + 3*A*a^3*c^2*d^5 - C*a^3*c^2*d^5 - 3*B*a^2*b*c^2*d^5 - 3*A*a*b^2*c^2*d^5 + A*a^3*d^7)/
((c^4*d^4 + 2*c^2*d^6 + d^8)*(d*tan(f*x + e) + c)) + (C*b^3*d^2*tan(f*x + e)^2 - 4*C*b^3*c*d*tan(f*x + e) + 6*
C*a*b^2*d^2*tan(f*x + e) + 2*B*b^3*d^2*tan(f*x + e))/d^4)/f

________________________________________________________________________________________

maple [B]  time = 0.29, size = 2250, normalized size = 3.89 \[ \text {result too large to display} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((a+b*tan(f*x+e))^3*(A+B*tan(f*x+e)+C*tan(f*x+e)^2)/(c+d*tan(f*x+e))^2,x)

[Out]

-4/f/d/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*B*b^3*c^3-2/f*d/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*C*a^3*c+3/f/d^4/(c^2+d^2)
^2*ln(c+d*tan(f*x+e))*C*b^3*c^6+5/f/d^2/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*C*b^3*c^4-3/f/(c^2+d^2)^2*C*arctan(tan(
f*x+e))*a*b^2*d^2+2/f/(c^2+d^2)^2*B*arctan(tan(f*x+e))*a^3*c*d-1/f/d/(c^2+d^2)/(c+d*tan(f*x+e))*C*c^2*a^3+1/f/
d^4/(c^2+d^2)/(c+d*tan(f*x+e))*C*c^5*b^3+3/2/f/(c^2+d^2)^2*ln(1+tan(f*x+e)^2)*A*a^2*b*c^2-3/2/f/(c^2+d^2)^2*ln
(1+tan(f*x+e)^2)*A*a^2*b*d^2-3/2/f/(c^2+d^2)^2*ln(1+tan(f*x+e)^2)*B*a*b^2*c^2+3/f/(c^2+d^2)/(c+d*tan(f*x+e))*A
*a^2*c*b+9/f/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*B*a*b^2*c^2+9/f/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*C*a^2*b*c^2+2/f/(c^
2+d^2)^2*C*arctan(tan(f*x+e))*b^3*c*d-3/f/(c^2+d^2)^2*B*arctan(tan(f*x+e))*a^2*b*c^2+3/f/(c^2+d^2)^2*B*arctan(
tan(f*x+e))*a^2*b*d^2+3/f/(c^2+d^2)^2*C*arctan(tan(f*x+e))*a*b^2*c^2+1/f/d^2/(c^2+d^2)/(c+d*tan(f*x+e))*A*c^3*
b^3-1/f/(c^2+d^2)^2*ln(1+tan(f*x+e)^2)*A*a^3*c*d-3/f/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*A*a^2*b*c^2-2/f/(c^2+d^2)^
2*A*arctan(tan(f*x+e))*b^3*c*d+3/2/f/(c^2+d^2)^2*ln(1+tan(f*x+e)^2)*B*a*b^2*d^2-1/f/(c^2+d^2)^2*ln(1+tan(f*x+e
)^2)*B*b^3*c*d+1/f/(c^2+d^2)^2*ln(1+tan(f*x+e)^2)*C*a^3*c*d-3/2/f/(c^2+d^2)^2*ln(1+tan(f*x+e)^2)*C*a^2*b*c^2-1
/f/d^3/(c^2+d^2)/(c+d*tan(f*x+e))*B*c^4*b^3+3/2/f/(c^2+d^2)^2*ln(1+tan(f*x+e)^2)*C*a^2*b*d^2-3/f/(c^2+d^2)^2*A
*arctan(tan(f*x+e))*a*b^2*c^2+3/f/(c^2+d^2)^2*A*arctan(tan(f*x+e))*a*b^2*d^2+2/f*d/(c^2+d^2)^2*ln(c+d*tan(f*x+
e))*A*a^3*c+3/f*d^2/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*A*a^2*b+1/f/d^2/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*A*b^3*c^4-2/
f/d^3/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*B*b^3*c^5-3/f/d/(c^2+d^2)/(c+d*tan(f*x+e))*A*c^2*a*b^2+3/f/(c^2+d^2)^2*ln
(1+tan(f*x+e)^2)*A*a*b^2*c*d+3/f/d^2/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*C*a^2*b*c^4-6/f/d^3/(c^2+d^2)^2*ln(c+d*tan
(f*x+e))*C*a*b^2*c^5-12/f/d/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*C*a*b^2*c^3-6/f*d/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*A*
a*b^2*c+3/f/(c^2+d^2)^2*ln(1+tan(f*x+e)^2)*B*a^2*b*c*d-3/f/(c^2+d^2)^2*ln(1+tan(f*x+e)^2)*C*a*b^2*c*d+6/f/(c^2
+d^2)^2*A*arctan(tan(f*x+e))*a^2*b*c*d-6/f/(c^2+d^2)^2*B*arctan(tan(f*x+e))*a*b^2*c*d-6/f/(c^2+d^2)^2*C*arctan
(tan(f*x+e))*a^2*b*c*d+3/f/d^2/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*B*a*b^2*c^4-3/f/d/(c^2+d^2)/(c+d*tan(f*x+e))*B*c
^2*a^2*b+3/f/d^2/(c^2+d^2)/(c+d*tan(f*x+e))*B*c^3*a*b^2+3/f/d^2/(c^2+d^2)/(c+d*tan(f*x+e))*C*c^3*a^2*b-3/f/d^3
/(c^2+d^2)/(c+d*tan(f*x+e))*C*c^4*a*b^2-6/f*d/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*B*a^2*b*c+1/f/(c^2+d^2)^2*B*arcta
n(tan(f*x+e))*b^3*c^2-1/f/(c^2+d^2)^2*B*arctan(tan(f*x+e))*b^3*d^2-1/f/(c^2+d^2)^2*C*arctan(tan(f*x+e))*a^3*c^
2+1/f/(c^2+d^2)^2*C*arctan(tan(f*x+e))*a^3*d^2+1/f/(c^2+d^2)/(c+d*tan(f*x+e))*a^3*B*c+1/f*b^3/d^2*B*tan(f*x+e)
+1/2/f*b^3/d^2*C*tan(f*x+e)^2+3/f/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*A*b^3*c^2-1/f/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*
B*a^3*c^2-1/f*d/(c^2+d^2)/(c+d*tan(f*x+e))*A*a^3+1/f*d^2/(c^2+d^2)^2*ln(c+d*tan(f*x+e))*B*a^3-1/2/f/(c^2+d^2)^
2*ln(1+tan(f*x+e)^2)*A*b^3*c^2+1/2/f/(c^2+d^2)^2*ln(1+tan(f*x+e)^2)*A*b^3*d^2+1/2/f/(c^2+d^2)^2*ln(1+tan(f*x+e
)^2)*B*a^3*c^2-1/2/f/(c^2+d^2)^2*ln(1+tan(f*x+e)^2)*B*a^3*d^2+3/f*b^2/d^2*C*tan(f*x+e)*a-2/f*b^3/d^3*C*c*tan(f
*x+e)+1/2/f/(c^2+d^2)^2*ln(1+tan(f*x+e)^2)*C*b^3*c^2-1/2/f/(c^2+d^2)^2*ln(1+tan(f*x+e)^2)*C*b^3*d^2+1/f/(c^2+d
^2)^2*A*arctan(tan(f*x+e))*a^3*c^2-1/f/(c^2+d^2)^2*A*arctan(tan(f*x+e))*a^3*d^2

________________________________________________________________________________________

maxima [A]  time = 0.73, size = 684, normalized size = 1.18 \[ \frac {\frac {2 \, {\left ({\left ({\left (A - C\right )} a^{3} - 3 \, B a^{2} b - 3 \, {\left (A - C\right )} a b^{2} + B b^{3}\right )} c^{2} + 2 \, {\left (B a^{3} + 3 \, {\left (A - C\right )} a^{2} b - 3 \, B a b^{2} - {\left (A - C\right )} b^{3}\right )} c d - {\left ({\left (A - C\right )} a^{3} - 3 \, B a^{2} b - 3 \, {\left (A - C\right )} a b^{2} + B b^{3}\right )} d^{2}\right )} {\left (f x + e\right )}}{c^{4} + 2 \, c^{2} d^{2} + d^{4}} + \frac {2 \, {\left (3 \, C b^{3} c^{6} - 2 \, {\left (3 \, C a b^{2} + B b^{3}\right )} c^{5} d + {\left (3 \, C a^{2} b + 3 \, B a b^{2} + {\left (A + 5 \, C\right )} b^{3}\right )} c^{4} d^{2} - 4 \, {\left (3 \, C a b^{2} + B b^{3}\right )} c^{3} d^{3} - {\left (B a^{3} + 3 \, {\left (A - 3 \, C\right )} a^{2} b - 9 \, B a b^{2} - 3 \, A b^{3}\right )} c^{2} d^{4} + 2 \, {\left ({\left (A - C\right )} a^{3} - 3 \, B a^{2} b - 3 \, A a b^{2}\right )} c d^{5} + {\left (B a^{3} + 3 \, A a^{2} b\right )} d^{6}\right )} \log \left (d \tan \left (f x + e\right ) + c\right )}{c^{4} d^{4} + 2 \, c^{2} d^{6} + d^{8}} + \frac {{\left ({\left (B a^{3} + 3 \, {\left (A - C\right )} a^{2} b - 3 \, B a b^{2} - {\left (A - C\right )} b^{3}\right )} c^{2} - 2 \, {\left ({\left (A - C\right )} a^{3} - 3 \, B a^{2} b - 3 \, {\left (A - C\right )} a b^{2} + B b^{3}\right )} c d - {\left (B a^{3} + 3 \, {\left (A - C\right )} a^{2} b - 3 \, B a b^{2} - {\left (A - C\right )} b^{3}\right )} d^{2}\right )} \log \left (\tan \left (f x + e\right )^{2} + 1\right )}{c^{4} + 2 \, c^{2} d^{2} + d^{4}} + \frac {2 \, {\left (C b^{3} c^{5} - A a^{3} d^{5} - {\left (3 \, C a b^{2} + B b^{3}\right )} c^{4} d + {\left (3 \, C a^{2} b + 3 \, B a b^{2} + A b^{3}\right )} c^{3} d^{2} - {\left (C a^{3} + 3 \, B a^{2} b + 3 \, A a b^{2}\right )} c^{2} d^{3} + {\left (B a^{3} + 3 \, A a^{2} b\right )} c d^{4}\right )}}{c^{3} d^{4} + c d^{6} + {\left (c^{2} d^{5} + d^{7}\right )} \tan \left (f x + e\right )} + \frac {C b^{3} d \tan \left (f x + e\right )^{2} - 2 \, {\left (2 \, C b^{3} c - {\left (3 \, C a b^{2} + B b^{3}\right )} d\right )} \tan \left (f x + e\right )}{d^{3}}}{2 \, f} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a+b*tan(f*x+e))^3*(A+B*tan(f*x+e)+C*tan(f*x+e)^2)/(c+d*tan(f*x+e))^2,x, algorithm="maxima")

[Out]

1/2*(2*(((A - C)*a^3 - 3*B*a^2*b - 3*(A - C)*a*b^2 + B*b^3)*c^2 + 2*(B*a^3 + 3*(A - C)*a^2*b - 3*B*a*b^2 - (A
- C)*b^3)*c*d - ((A - C)*a^3 - 3*B*a^2*b - 3*(A - C)*a*b^2 + B*b^3)*d^2)*(f*x + e)/(c^4 + 2*c^2*d^2 + d^4) + 2
*(3*C*b^3*c^6 - 2*(3*C*a*b^2 + B*b^3)*c^5*d + (3*C*a^2*b + 3*B*a*b^2 + (A + 5*C)*b^3)*c^4*d^2 - 4*(3*C*a*b^2 +
 B*b^3)*c^3*d^3 - (B*a^3 + 3*(A - 3*C)*a^2*b - 9*B*a*b^2 - 3*A*b^3)*c^2*d^4 + 2*((A - C)*a^3 - 3*B*a^2*b - 3*A
*a*b^2)*c*d^5 + (B*a^3 + 3*A*a^2*b)*d^6)*log(d*tan(f*x + e) + c)/(c^4*d^4 + 2*c^2*d^6 + d^8) + ((B*a^3 + 3*(A
- C)*a^2*b - 3*B*a*b^2 - (A - C)*b^3)*c^2 - 2*((A - C)*a^3 - 3*B*a^2*b - 3*(A - C)*a*b^2 + B*b^3)*c*d - (B*a^3
 + 3*(A - C)*a^2*b - 3*B*a*b^2 - (A - C)*b^3)*d^2)*log(tan(f*x + e)^2 + 1)/(c^4 + 2*c^2*d^2 + d^4) + 2*(C*b^3*
c^5 - A*a^3*d^5 - (3*C*a*b^2 + B*b^3)*c^4*d + (3*C*a^2*b + 3*B*a*b^2 + A*b^3)*c^3*d^2 - (C*a^3 + 3*B*a^2*b + 3
*A*a*b^2)*c^2*d^3 + (B*a^3 + 3*A*a^2*b)*c*d^4)/(c^3*d^4 + c*d^6 + (c^2*d^5 + d^7)*tan(f*x + e)) + (C*b^3*d*tan
(f*x + e)^2 - 2*(2*C*b^3*c - (3*C*a*b^2 + B*b^3)*d)*tan(f*x + e))/d^3)/f

________________________________________________________________________________________

mupad [B]  time = 16.68, size = 701, normalized size = 1.21 \[ \frac {\mathrm {tan}\left (e+f\,x\right )\,\left (\frac {B\,b^3+3\,C\,a\,b^2}{d^2}-\frac {2\,C\,b^3\,c}{d^3}\right )}{f}-\frac {\ln \left (\mathrm {tan}\left (e+f\,x\right )+1{}\mathrm {i}\right )\,\left (B\,a^3-A\,b^3+C\,b^3+3\,A\,a^2\,b-3\,B\,a\,b^2-3\,C\,a^2\,b+A\,a^3\,1{}\mathrm {i}+B\,b^3\,1{}\mathrm {i}-C\,a^3\,1{}\mathrm {i}-A\,a\,b^2\,3{}\mathrm {i}-B\,a^2\,b\,3{}\mathrm {i}+C\,a\,b^2\,3{}\mathrm {i}\right )}{2\,f\,\left (-c^2+c\,d\,2{}\mathrm {i}+d^2\right )}+\frac {\ln \left (c+d\,\mathrm {tan}\left (e+f\,x\right )\right )\,\left (d^4\,\left (3\,A\,b^3\,c^2-B\,a^3\,c^2-3\,A\,a^2\,b\,c^2+9\,B\,a\,b^2\,c^2+9\,C\,a^2\,b\,c^2\right )-d^5\,\left (2\,C\,a^3\,c-2\,A\,a^3\,c+6\,A\,a\,b^2\,c+6\,B\,a^2\,b\,c\right )-d^3\,\left (4\,B\,b^3\,c^3+12\,C\,a\,b^2\,c^3\right )+d^6\,\left (B\,a^3+3\,A\,b\,a^2\right )-d\,\left (2\,B\,b^3\,c^5+6\,C\,a\,b^2\,c^5\right )+d^2\,\left (A\,b^3\,c^4+5\,C\,b^3\,c^4+3\,B\,a\,b^2\,c^4+3\,C\,a^2\,b\,c^4\right )+3\,C\,b^3\,c^6\right )}{f\,\left (c^4\,d^4+2\,c^2\,d^6+d^8\right )}-\frac {\ln \left (\mathrm {tan}\left (e+f\,x\right )-\mathrm {i}\right )\,\left (A\,a^3-A\,b^3\,1{}\mathrm {i}+B\,a^3\,1{}\mathrm {i}+B\,b^3-C\,a^3+C\,b^3\,1{}\mathrm {i}-3\,A\,a\,b^2+A\,a^2\,b\,3{}\mathrm {i}-B\,a\,b^2\,3{}\mathrm {i}-3\,B\,a^2\,b+3\,C\,a\,b^2-C\,a^2\,b\,3{}\mathrm {i}\right )}{2\,f\,\left (-c^2\,1{}\mathrm {i}+2\,c\,d+d^2\,1{}\mathrm {i}\right )}-\frac {C\,a^3\,c^2\,d^3-B\,a^3\,c\,d^4+A\,a^3\,d^5-3\,C\,a^2\,b\,c^3\,d^2+3\,B\,a^2\,b\,c^2\,d^3-3\,A\,a^2\,b\,c\,d^4+3\,C\,a\,b^2\,c^4\,d-3\,B\,a\,b^2\,c^3\,d^2+3\,A\,a\,b^2\,c^2\,d^3-C\,b^3\,c^5+B\,b^3\,c^4\,d-A\,b^3\,c^3\,d^2}{d\,f\,\left (\mathrm {tan}\left (e+f\,x\right )\,d^4+c\,d^3\right )\,\left (c^2+d^2\right )}+\frac {C\,b^3\,{\mathrm {tan}\left (e+f\,x\right )}^2}{2\,d^2\,f} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(((a + b*tan(e + f*x))^3*(A + B*tan(e + f*x) + C*tan(e + f*x)^2))/(c + d*tan(e + f*x))^2,x)

[Out]

(tan(e + f*x)*((B*b^3 + 3*C*a*b^2)/d^2 - (2*C*b^3*c)/d^3))/f - (log(tan(e + f*x) + 1i)*(A*a^3*1i - A*b^3 + B*a
^3 + B*b^3*1i - C*a^3*1i + C*b^3 - A*a*b^2*3i + 3*A*a^2*b - 3*B*a*b^2 - B*a^2*b*3i + C*a*b^2*3i - 3*C*a^2*b))/
(2*f*(c*d*2i - c^2 + d^2)) + (log(c + d*tan(e + f*x))*(d^4*(3*A*b^3*c^2 - B*a^3*c^2 - 3*A*a^2*b*c^2 + 9*B*a*b^
2*c^2 + 9*C*a^2*b*c^2) - d^5*(2*C*a^3*c - 2*A*a^3*c + 6*A*a*b^2*c + 6*B*a^2*b*c) - d^3*(4*B*b^3*c^3 + 12*C*a*b
^2*c^3) + d^6*(B*a^3 + 3*A*a^2*b) - d*(2*B*b^3*c^5 + 6*C*a*b^2*c^5) + d^2*(A*b^3*c^4 + 5*C*b^3*c^4 + 3*B*a*b^2
*c^4 + 3*C*a^2*b*c^4) + 3*C*b^3*c^6))/(f*(d^8 + 2*c^2*d^6 + c^4*d^4)) - (log(tan(e + f*x) - 1i)*(A*a^3 - A*b^3
*1i + B*a^3*1i + B*b^3 - C*a^3 + C*b^3*1i - 3*A*a*b^2 + A*a^2*b*3i - B*a*b^2*3i - 3*B*a^2*b + 3*C*a*b^2 - C*a^
2*b*3i))/(2*f*(2*c*d - c^2*1i + d^2*1i)) - (A*a^3*d^5 - C*b^3*c^5 - B*a^3*c*d^4 + B*b^3*c^4*d - A*b^3*c^3*d^2
+ C*a^3*c^2*d^3 + 3*A*a*b^2*c^2*d^3 - 3*B*a*b^2*c^3*d^2 + 3*B*a^2*b*c^2*d^3 - 3*C*a^2*b*c^3*d^2 - 3*A*a^2*b*c*
d^4 + 3*C*a*b^2*c^4*d)/(d*f*(c*d^3 + d^4*tan(e + f*x))*(c^2 + d^2)) + (C*b^3*tan(e + f*x)^2)/(2*d^2*f)

________________________________________________________________________________________

sympy [F(-1)]  time = 0.00, size = 0, normalized size = 0.00 \[ \text {Timed out} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a+b*tan(f*x+e))**3*(A+B*tan(f*x+e)+C*tan(f*x+e)**2)/(c+d*tan(f*x+e))**2,x)

[Out]

Timed out

________________________________________________________________________________________

[next] [prev] [prev-tail] [front] [up]